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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL Feu UIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


CORPORATION. 
DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


® 
& 
wy 
® 
w 
° 
& 
® 
& 
® 
se TRANSFERRED, 
‘® 
& 
:® 
:@ 
:@ 
:® 
:® 
-® 
:® 
:* 


;++ 


FACILITY: SATS SYSTEM SERVICE TESTS 

ABSTRACT: THE SATSSFO9 MODULE TESTS THE EXECUTION OF CERTAIN 
VMS SYSTEM SERVICES, INVOKED IN SUCH A WAY AS TO EXPECT FAILING 
STATUS CODES. THE SYSTEM SERVICES TESTED AND THE STATUS CODES 


GUME 
WHICH APPEAR NEAR THE END OF THIS LISTING. SUCCESSFUL STATUS 
CODES ARE TESTED IN OTHER MODULES. 


ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE 
DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA CREATION DATE: MMM, 1978 
PAUL D. FAY (DISPSERY & TESTSERV MACROS) 


MODIFIED BY: 


v03-002 papeees Larry D. Jones 19-Apr-1984 
Enhance to extended device name Length from 64 to 256. 


v03-001 RNHOOO01 Richard N. Holstein 05-Nov-1982 
Dollar signs are no longer vA hepet in device names, 
substitute some characters which still are. 
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THIS SOFTWARE 8 gt ae UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY i ACCORDANCE WITH THE Na ; SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE Spd NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
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P=19 
: ; .SBTTL DECLARATIONS 
: ; INCLUDE FILES: 
0 eo 


UETPSY.SRCISATSSF 


6 SPHDDEF ; PROCESS HEADER OFFSET SYMBOLS 
61 SPCBDEF ; PROCESS CONTROL BLOCK OFFSET SYMBS 
6 SSTSDEF 3 STATUS MESSAGE SYMBOLS 
é SPRVDEF : SYMBOL DEFS FOR PRIVILEGES 
64 SUE TPDEF : UETP MSG CODE DEFINITIONS 
$9 SSHR_MESSAGES UETP,116,<<TEXT, INFO>> 

$ 3 DEFINE UETPS_TEXT 
° SPSLDEF ; ACCESS MODE SYMBOLS 

3 : MACROS: 

0 3 
71 ; 

4 ; EQUATED SYMBOLS: 

74 WARNING = 0 ; WARNING SEVERITY VALUE FOR MSGS 
75 SUCCESS =] + SUCCESS SEVERITY VALUE FOR MSGS 
i: ERROR = 5 : ERROR SEVERITY VALUE FOR MSG 

f INFO = ; INFORMATIONAL SEV VALUE FOR MSGS 

SEVERE = 4 ; SEVERE (FATAL) SEV VALUE FOR MSGS 

79 TCG_NO = 0 : INITIALIZE TEST CASE GROUP NUMBER 
0 GRP7 TOTAL = : INITIALIZE TEST CASE GROUP TOTAL 
1 RO_THRU SP = “M<RO,R1,R2,R3,R4,R5,RO,R7,RB,R9,R10,R11, AP, FP, SP> 

; MBRNAM_KSN = 0 : MBXNAM ARG FOR SASSIGN (MISSING ARG) 

4 : OWN STORAGE: 


—— ——y 


5 
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000000 7 .PSECT RODATA, RD ,NOWRT .NOEX E ,LONG 
BFFC : REG_COMP_MASK: WORD  “M<R2,R$,R4,R5,R6,R7,RB,R9,R10,R11,AP,FP> ! *x8000 - 
; o.Ree COMPARE MASK’ (HIGH-ORDER ... 
9 Face Gat must BE ON 
ERR_MSG_FAOCTL: STRING I,<!/!AC!12B!17B: REGISTER | 2UW CONTENTS ALTERED>, - 
; <; BEFORE § SER ERVICE CALL: !8XL AFTER SERVICE CALL: !8XL 
TEST. MOD_NAME: STRING C,<SATSSFO9> |; TEST MODULE NAME 
4 TEST“MOD"BEG: STRING €:<begun> ; DISPOSITION FIELD OF TEST MOD MSG 
p 95 TEST. MOD"SUCC: STRING s<successful> ; DISPOSITION FIELD OF TEST MOD MSG 
%6 TEST“MOD-FAIL: STRING (.<failed> ; DISPOSITION FIELD OF TEST MOD MSG 
F 97 TESTEMOD-NAME_D: STRING I,<SATSSFO9> — ; TEST MODULE NAME DESCRIPTOR 
F 38 TTNAME : STRING I,<TT> TERMINAL LOGICAL NAME 
00000000" 90000000" D0A9 INADR: . LONG NOA cess, noacces$ : PAGE ADDRESS OF NOACCESS PSECT 
000000' 0081 100 PROT: “LONG TSC_NA ; PROTECTION CODE FOR NOACCESS PSECT 
FFFFFEFE FFFFFFFE 0085 101 ONES: "LONG = te + A QUADWORD OF 1-BITS 
D0BD = j DEVNAM_GDV : DEVNAM ARGUMENT FOR GETDEV 
10BD 103 DEVNAM~ASN: ; DEVNAM ARGUMENT FOR ASSIGN 
D0BD 104 MBXNAM~ASNG2 ; MBXNAM ARGUMENT FOR ASSIGN 
00BD 105 STRING fogs yggousee 
D0CcD. Sis : DEVNAM_GDV10: STRING I.< : DEVNAM ARGUMENT FOR GETDEV 
107 DEVNAM~GDV11: > DEVNAM ARGUMENT FOR GETDEV 
108 DEVNAM~ASN10: ; DEVNAM ARGUMENT FOR ASSIGN 
00000000 109 .LONG 0 
pc* 0 110 eADDRESS . P+ eeeeeeaeeeaeaeae 
£0 111 DEVNAM_GDV12: : DEVNAM ARGUMENT FOR GETDEV 
118 MBXNAM~ASN4O: ; MBXNAM ARGUMENT FOR ASSIGN 
99109 11 .LONG 256 
é * 0064 114 SADDRESS .+4 
20 44 45 52 44 GE 55 48 30 4F 4 O00€8 115 “ASCII /TWO HUNDRED AND FIFTY SIX CHARACTERS/ 
49 33 20 3 54 46 49 46 9 44 gE 41 O0F4 
oO OS eS $o0801¢8 19 11 BLKB 220 
1E 113 DEVNAM_GDV13: ; DEVNAM ARGUMENT FOR GETDEV 
1E 118 DEVNAM_ASN11: > DEVNAM ARGUMENT FOR ASSIGN 
1E 1 STRING 1,<_22A0:> 
1F6 120 PRILEN_GDV20: : PRILEN ARGUMENT FOR GETDEV 
1F6 121 SEC LEN ebva3! : SECLEN ARGUMENT FOR GETDEV 
1F6 j PRILEN~GCH20: : PRILEN ARGUMENT FOR GETCHN 
1F6 123 SECLEN-GCH4O: : SECLEN ARGUMENT FOR GETCHN 
Q000001F8 O1F6 126 .BLKW 1 
1F 125 PRIBUF_GDV31: : PRIBUF ARGUMENT FOR GETDEV 
178 t SECBUF~GDV51: : SECBUF ARGUMENT FOR GETDEV 
1F8 127 PRIBUF~GCH31: : PRIBUF ARGUMENT FOR GETCHN 
178 a SECBUF ~GCH51: : SECBUF ARGUMENT FOR GETCHN 
178 STRING 0,100 
1 6 MY_DISK: STRING I.<SYS$DISK> ; LOGICAL NAME FOR USER DISK 
4 131 CHAN_GCH10: ; CHAN ARGUMENT FOR GETCHN 
m4 é CHAN-DAS11: : CHAN ARGUMENT FOR DASSGN 
z ; CHAN~DMX12: hate oe : CHAN ARGUMENT FOR DELMBX 
peenenes 78 135 CHAN_GCH11: : CHAN ARGUMENT FOR GETCHN 
78 (O 6 CHAN-DAS 1 ¢: : CHAN ARGUMENT FOR DASSGN 
78 137 CHANTDMX15: CHAN ARGUMENT FOR DELMBX 
9ACA 78 O : .LONG 1000000000 
43 139 CHAN_ASN20: “BLKL 1 > CHAN ARGUMENT FOR ASSIGN 
8 146 ACMOBE_ASN: LONG PSLSC s¥SER : ACMODE ARGUMENT FOR ASSIGN 
4 141 MBXNAMTASN41: STRING I,<_?? + MBXNAM ARGUMENT FOR ASSIGN 
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says f DECLARATIONS oi cneen 
-PSECT RWDATA,RDW ; D FOR THIS PROCESS 
2 122 TPID: »BLKL 1" : PTR TO CURRENT TEST CASE 3 
Rae cae SE oe 
28009 ose a? ROD-Aot CODE: “LONG ueres_ SATSMS CLOSGERED REG. NO. (F08 FAO ERR ASG) 
00 36 ie 169 REG BEFORE Ss: -BLKL 1 ewe te ft ERROR MSG) 
1 a ; REG CONTENTS AFTER S.S. 
56 9080 181 REG AFTERSS: = .BLKL 1 : ..._ (FOR FAO ERROR MSG) 
rity Ae " yrs ; ASCII PORTION OF TEST CASE NAME 
< 188 sststHss: ty BS eh 7 eT a Sie 
154 TMN_ADDR: “ADDRESS. TEST-MOD-BEG” ADDR OF TOR. DISP FIELD FOR FAO 
SH 66 1 3 TRO PADDR tT ten Neches + ENTRY PNT FOR CURR TESTSERV MACRO 
88 189 RETADA “BLKL : PROT RETURN BYTE FOR SETPRT 
: i 0 PRYPRT a ADDR OF PRIVILEGE MASK CIN PHD) 
00071 198 PRYPRI: -BLKB i; ADDR OF PRIVILEGE MASK (IN. 
000007D 79 16 CHM CON : *BLKL 5 : AREA £ at ENT FOR GETDEV 
a oe Re 
ie SA et | SHIM Samrat FS Slee 
091 1 *  puKw 1 NT FOR GETDEV 
00000095 3688189 rzeut cov { SECBUF ARGENT FOR GETDEY 
0093 189 PR IBUF =6CH: : SECBUF ARGUMENT FOR GETCHN 
6093. i”) ens STRING 0,100 ; PRIBUF ARGUMENT FOR GETDEV 
Bore 158 DRIBUE ~BeN80; ; PRIBUF ARGUMENT FOR GETCHN 
OOF The Tne STRING 0,1 ; SECBUF ARGUMENT FOR GETDEV 
0108 175 SECBUF _GDV50: ; SECBUF ARGUMENT FOR GETCHN 
108 176 SECBUFIGCHSO: 
00000000 O10 ADDRESS . : CHAN ARGUMENT FOR GETCHN 
80000000 0110 179 CHAN_GCH: “LONG 0 : CHAN ARGUMENT FOR GETCHN 
gosegong iis 1E) Cumstti2: <Low i Ein ARGUMENT FOR BRS0Sh 
8600000 O11R 182 EHANTDAS, -LONG 9 : CHAN ARGUMENT FOR DASSGN 
2000098 Hie 188 CHANCDASiO: -LONG 0 CHAN ARGUMENT FOR DELABX 
0 128184 CHANDRA: ONG 9 : CHAN ARGUMENT FOR DELMBX 
09 136 183 CHANZDMAIO: -LONG 0 : NT FOR DELMBX 
Sas ist I etait: te | MME ARSENY (BEARS 
SSa00008 $13h 186 EHAN-BRITy: Lok ; 
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»PSECT . eee tho 1,RD,WRT, NOEXE PAGE 


MPTY: ; RESERVE A PAGE OF SPACE 


sequseneueseonseonpensnneneeonnsensseeuaceansoesesesesnoneouseens 
THE ORDER oF glues tte tn i THIS Put I$ 1 Saat 


® 

* DO NOT RE-ARRANGE THE VARI NSULT 

. FUNCTIONAL SPECIFICATION FOR A DESCRIPTION OF THE U 
x 
® 


® 
® 
© 
OF THE EMPTY PSECT (AND ITS COMPANION PSECT, NOMCCESS). 7 
® 


LARARARARALARALASLALAAALALE LSA ESE E ALAR E EE EEE TERE EERE E EEE EERE EES 
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TYPE AAAAA_SSSX1 _ fTNPE —_ SSSX2 IF ag * DESC) GO HERE: 


0 V04- 
oa Ser 09. mAR: 1 


oe 
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TYPE AAAAA AS88i5- fone HERE : 


DRESS .+4 ; 
TYPE AAAAA -sssi3” 69 HERE: 


; TYPE AAAAA -sssig 60 60 MEpEs 


LOW ROOM FOR STRING DESCRIPTOR 


STRING LENGTH (WILL CROSS PSECT BOUNDARY) 
STRING ADDRESS 


; LOW-ORDER BYTE OF STRING LENGTH 


STRING LENGTH 


.PSECT SATS. ACCVIO_2,RD,WRT ,NOEXE , PAGE 
NOACCESS: -BLKB 312° ; RESERVE A PAGE OF SPACE 
- 51 ; RETURN LOC CTR TO BEGINNING OF PSECT 
“ADDRESS EMPT ESS OF ACCESSIBLE STRING 
ADDRESS EMP T¥/4x100 : ADDRESS OF ACCESSIBLE STRING 

:* 
; *#* NOTE == DO NOT CHANGE LOCATION OR SEQUENCE OF ABOVE STATEMENTS: 
3 tee THIS PSECT (NOA cceSS) MUST APPEAR IN MEMORY IMMEDIATELY 
; tee FOLLOWING THE EMPTY ECT NAMES AND OPTIONS WILL BE 
; tee CHOSEN TO FORCE THE DESIRED PSECT ORDERING. 
bev NAM -GDVI4: STRING 1,<SYS$SDISK> |; DEVNAM ARGUMENT FOR GETDEV 
DEVNAM~ASN1 STRING 1,<SYS$SDISK> | : DEVNAM ARGUMENT FOR ASSIGN 
MBXNAM-ASN43: © STRING 1,<_MBO:> : MBXNAM ARGUMENT FOR ASSIGN 


-PSECT SATSSFO9,RD.WRT,EXE,LONG 
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E 
U 
A 
X17 TO THE 


S WITH A $E 
A STATUS CODE DEFIN 
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: 
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H 
T 
T 
T 
U 
(DCL COMMAND) 


TERMINATE 


RF 
Gl 
XE 
HE 
i 
ER 
AC 
TC 
R 
SE 
TC 
ST 
RE 
HE 
C 
CA 
S 
A 
AS 


-SBTTL SATSSFO9 


FUNCTIONAL DESCRIPTION: 
$ 
$ 
Y 
Pp 
A 
S 
& 
A 
s 
S 
C 
R 
A 
T 
I 
$ RUN SATSSFO9 


$s 
G 
N 
E 
N 
T 
G 
E 
x 
T 
Ss 
R 
CALLING SEQUENCE: 
INPUT PARAMETERS: 
NONE 
IMPLICIT INPUTS: 
NONE 
OUTPUT PARAMETERS: 
NONE 
IMPLICIT OUTPUTS: 
E 
H 
COMPLETION CODES 
SIDE EFFECTS: 
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SATSSF TS SYSTEM SERVICE TESTS (FAILING 4 4 00: AX/VM © V04- Page 7 SA 
$Ous808° sats $sF08 g-SEF =1382 8? +38: 98 UETPSY.S 48a 709 MAR; 1 . (1) vO 
oP i NONE 
99 ; 
$7 
35 
0 SATSSFO9: 
OFFC 1 «WORD “M<R2,R3,R4,R5,RO,R7,RB,RIR10,R11> 
00 : ; ENTRY MASK 
00 SWAKE_S TPID : GET PID OF THIS PROCESS 
1 i HIBER + UNDO WAKE 
1 7 SSETPRA S$ TEST_MOD_NAME_D + SET PROCESS NAME 
131D 30 6 HOD MSG_PRINT ; PRINT TEST MODULE BEGIN MSG 
00000060' EF 90009070" EF DE 00 : 6 AOVA EST MOD SUCC, TMD ADDR ASSUME END MSG WILL SHOW SUCCESS 
00000044'EF 03 00 061 FO 00 8 INSV #SUCEESS70 #0,43,M0B_M G_cbve ; ADJUST STATUS CODE of Or SUCCESS 
03¢ 309 MODE *NOREGS~ ; KERNEL MODE TO ACCESS PHD 
59 00000000'°9F pO 0059 310 MOVL sete Hi Pho. R9 GET PROCESS HEADER pADDRESS 
00000071'EF 69 ODE 9060 11 MOVAL PHOSG See TUSK ERD). PRIVMASK GET PRIV MASK 
006 iF MODE FROM, TOS ; GéT BACK “10 USER 
0068 = = 31 PRIV_— ADD, ALL ; GET ALL PRIVILEGES 
0088 14 DISPSERV SET UP DISPLAY INFO FOR TESTSERV 
1D «6.315 SSETPRT_S INADR=INADR, RETADR= =RETADR, - 
021D 316 PROT=PROT, PRVPRT=PRVP PRT 
0 3 17 SET NOACCESS PSECT ... 
O23E 318 i 22 FOR NO USER ACCESS 
OF97 31 0 i 19 BRW EXECUTE GO EXECUTE ALL TEST CASES 
0241 1 TC_GROUP GDV,1,TS1 
0268 : : 
0268 NEXT_TEST_CASE SFGDV10 


* 
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sud ebouneanqneceneebueeansaqwenemaenneenseensnneeett 
TEST CASE NAME: SFGDV10 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: DEVNAM_GDV10 


INPUT CONDITIONS: 
INVALID CHARACTERS IN DEVICE NAME 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVDEVNAM 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFGDV11 


C 6 
ety ark eTen semence rests craatool 5. up gep- tots OO:HE98 HN SSRIS ans HP fh] | 


st a08 i, 
tf 43 : pRARARAAAAAALALALALALALALALELELA LEASE SELES EES ESSER AGS 
3 ® 
f 3 ; * TEST CASE NAME: SFGDV11 
f 3 : * SYSTEM SERVICE: GETDEV 
2 34 : * ARGUMENT UNDER TEST: DEVNAM_GDV11 
74 36 : * INPUT CONDITIONS: 
o4 ; : ZERO LENGTH DEVICE NAME 
74 3g ; * EXPECTED RESUL Ts: 
74 «360: 1) SYSTEM STATUS CODE: IVLOGNAM 
0 r4 61 : 2) REGISTERS R2 THROUGH FP UNCHANGED 
8 iS $¢ : PARRBAASAAAASAAALALALALASLALELAESLALESLALALESESALAESAL SEES aS 
& 64 ;-- 
Bt a 
0274 °9 : NEXT_TEST_CASE SFGDV12 
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TEST CASE NAME: SFGDV12 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: DEVNAM_GDV12 


INPUT CONDITIONS: 
DEVICE NAME IS 64 CHARACTERS LONG. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVLOGNAM 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFGDV13 
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C 90 ; 
ae 
¢ : 
: $4 3 . TEST CASE NAME: SFGDV13 
¢ 36 : * SYSTEM SERVICE: GETDEV 
¢ 38 ; * ARGUMENT UNDER TEST: DEVNAM_GDV13 
€ 400 : * INPUT CONDITIONS: 
c 4 Jie VALID, NON-EXISTENT DEVICE 
cle : : * EXPECTED RESULTS: 
€ 404: * 1) SYSTEM STATUS CODE: NOSUCHDEV 
c 4 538 2) REGISTERS R2 THROUGH FP UNCHANGED 
c 607 : tARRBRABAAAAAALAAEAALELALSLALALALASLAESE SSE SESE E EEE ERSTE ESS 
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TEST CASE NAME: SFGDV14 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: DEVNAM_GDV14 


INPUT CONDITIONS: 
DEVICE NAME IN NON-ACCESSIBLE PSECT. 
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1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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. TEST CASE NAME: SFGDV30 

: SYSTEM SERVICE: GETDEV 

: ARGUMENT UNDER TEST: PRIBUF _GDV30 

* INPUT CONDITIONS: 

* PRIMARY CHARACTERISTICS BUFFER (LENGTH 1) IS 
: TOO SHORT FOR INCOMING DATA. 

* EXPECTED RESULTS: 

: 1) SYSTEM STATUS CODE: BUFFEROVF 
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TEST CASE NAME: SFGDV31 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: PRIBUF _GDV31 


INPUT CONDITIONS: 
PRIMARY CHARACTERISTICS BUFFER IN READ-ONLY PSECT. 


EXPECTED RESULTS: 
) SYSTEM pays CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFGDV40 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: SECLEN_GDV40 
iwryy CONDITIONS: 
SECONDARY CHARACTERISTICS LENGTH FIELD IN 
READ-ONLY PSECT. 
EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 


(ARRAAARARAAAAA SALAS AAALE SELES ALAS EE EEE REESE EERE REESE 


NEXT_TEST_CASE SFGDV5O 


kK 
SAT SStg9 woe SERVICE TESTS (FAILING S. i a PS 9 90:38:08 ree Macro V04- Page 


17 
“SEP=19 UETPSY.SRCISATSSFO9.MAR; 1 a1 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 

D4 
4 
4 
4 
4 
4 
4 
4 
4 


) 


. TIT IS IST IT IIIT iii titi iii iiiitiiiiiiiiitiiiiitiiiit) 
TEST CASE NAME: SFGDV50 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: SECBUF _GDV50 


INPUT CONDITIONS: 
SECONDARY CHARACTERISTICS BUFFER (LENGTH 0) IS 
TOO SHORT FOR INCOMING DATA. 


EXPECTED RESULTS: 
) SYSTEM genays CODE: BUFFEROVF 
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TEST CASE NAME: SFGDV51 
SYSTEM SERVICE: GETDEV 
ARGUMENT UNDER TEST: SECBUF _GDV51 


INPUT CONDITIONS: 
SECONDARY CHARACTERISTICS BUFFER IN READ-ONLY PSECT. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFGCH11 
SYSTEM SERVICE: GETCHN 
ARGUMENT UNDER TEST: CHAN_GCH11 


INPUT CONDITIONS: 
INVALID CHANNEL NUMBER (1 BILLION) 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVCHAN 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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6 : * SYSTEM SERVICE: GETCHN 
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TEST CASE NAME: SFGCH31 

SYSTEM SERVICE: GETCHN 

ARGUMENT UNDER TEST: PRIBUF _GCH31 


INPUT CONDITIONS: 
PRIMARY CHARACTERISTICS BUFFER IN READ-ONLY PSECT. 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFGCH40 


INPUT CONDITIONS: 
SECONDARY 11) li LENGTH FIELD IN 
READ-ONLY PSECT. 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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SYSTEM SERVICE: GETCHN 
ARGUMENT UNDER TEST: SECLEN_GCH40O 
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TEST CASE NAME: SFGCHSO 

SYSTEM SERVICE: GETCHN 

ARGUMENT UNDER TEST: SECBUF _GCH50 

INPUT CONDITIONS: 
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TEST CASE NAME: SFGCHS1 
SYSTEM SERVICE: GETCHN 
ARGUMENT UNDER TEST: SECBUF _GCH51 


INPUT CONDITIONS: 
SECONDARY CHARACTERISTICS BUFFER IN READ-ONLY PSECT. 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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$ SYSTEM SERVICE: ASSIGN 

9 ARGUMENT UNDER TEST: DEVNAM_ASN10 
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INPUT CONDITIONS 
ZERO LENGTH DEVICE NAME 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVLOGNAM 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFASN11 
SYSTEM SERVICE: ASSIGN 
ARGUMENT UNDER TEST: DEVNAM_ASN11 


INPUT CONDITIONS: 
VALID, NON-EXISTENT DEVICE 


EXPECTED i ed 
1) SYSTEM STATUS CODE: NOSUCHDEV 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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: TEST CASE NAME: SFASN12 

SYSTEM SERVICE: ASSIGN 

ARGUMENT UNDER TEST: DEVNAM_ASN12 


® 
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* INPUT CONDITIONS 
‘ DEVICE NAME IN NON-ACCESSIBLE PSECT. 
* D RESULTS: 
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TEST CASE NAME: SFASN20 
SYSTEM SERVICE: ASSIGN 
ARGUMENT UNDER TEST: CHAN_ASN20 


INP'T CONDITIONS: 
CHANNEL BUFFER IN READ-ONLY PSECT. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFASN4O 
SYSTEM SERVICE: ASSIGN 
ARGUMENT UNDER TEST: MBXNAM_ASN4O 


INPUT CONDITIONS: 
MAILBOX NAME IS LENGTH 64 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVLOGNAM 
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TEST CASE NAME: SFASN42 
SYSTEM SERVICE: ASSIGN 
ARGUMENT UNDER TEST: MBXNAM_ASN42 


INPUT CONDITIONS: 
MAILBOX SPECIFIED IS ACTUALLY A DISK. 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: DEVNOTMBX 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFASN43 
SYSTEM SERVICE: ASSIGN 
ARGUMENT UNDER TEST: MBXNAM_ASN43 


INPUT CONDITIONS: 
MAILBOX NAME IN NON-ACCESSIBLE PSECT. 


EXPECTED RESULTS: 
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SrBAUSQSVSTEN senvace vests: crantinG 5. 1p-s19He 90:38:08 pane mare YOR ag, 
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, “enonscennqueseeqensouneueeeeesceneceseereeeqneennseess 
: TEST CASE NAME: SFDAS10 

4 SYSTEM SERVICE: DASSGN 

f ARGUMENT UNDER TEST: CHAN_DAS10 


* 
® 
* 
* 
+ 
® 
* INPUT CONDITIONS: 

. DE-ASSIGN CHANNEL ASSIGNED BY EXEC MODE. 
s 

t 

® 

® 

e 

® 


exrectee RESULTS: 


FW 9 ODNO UNE WP 0 OD NOUS UO 


9 ) SYSTEM STATUS CODE: NOPRIV 

3 2) REGISTERS R2 THROUGH FP UNCHANGED 

2 PARRA RASASLAAAALALALALEESALES EEE EES ESE SELES EERE E EERE 

9 

9 MODE TO, 108, EXEC, NOREGS : GET EXEC MODE FOR SASSIGN 

99 SASSIGN_S BE VNAR=RY my DISK - t ASSIGN A CHANNEL IN EXEC MODE 
993 MODE FROM 10S" : BACK TO USER MODE 


995 NEXT_TEST_CASE SFDAS11 


re 


ee -) 


- = $ 
SSS? Hig vere sence vests crak 5. v-spriets BOSE RECO CREATE w.s th] | 


—b ss 4 4» _» 4 + —» + 2b —+ + _» _b —» 2 2 a 
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TEST CASE NAME: SFDAS11 
SYSTEM SERVICE: DASSGN 
ARGUMENT UNDER TEST: CHAN_DAS11 


INPUT CONDITIONS: 
INVALID CHANNEL NUMBER (ZERO) 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: IVCHAN 
2) REGISTERS R2 THROUGH FP UNCHANGED 


(ARARARAAAAASAAAAAAALALE SALAS ERLE ERLE EERE ER RA SRR RRR EES 


eaeeeneeeneeeeneanene 


MODE TO, 20$,EXxEC, “DAS s ; EXEC MODE FOR SDASSGN 
= ae . CHAN=CHAN DAS! : ; DE-ASSIGN CHANNEL ASSIGNED IN SFDAS10 
MODE Om, 208 ; BACK TO USER MODE 


NEXT_TEST_CASE SFDAS12 
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SFDAS12 


SQN 


4 2 st tt tt 


SF&F AAAI AINA oononononononinnd 


NO OONOAUNES OP OOOO 
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TEST CASE NAME: SFDAS12 
SYSTEM SERVICE: DASSGN 
ARGUMENT UNDER TEST: CHAN_DAS12 


INPUT CONDITIONS: 
INVALID CHANNEL NUMBER (1 BILLION) 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: IVCHAN 
2) REGISTERS R2 THROUGH FP UNCHANGED 


LARARARAAAAALALAAAALAALE LEAL EEE RARER ESSE EER REREAD 


e@aeeneeneneneneeeeeenene 


TCEND 
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S 
4F8 1043; 
rs 44 TC_GROUP DMX,1,TS5 

1F 1046 ° NEXT_TEST_CASE SFDMX10 
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SA 
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" gebaeaneiinnenbbsnuneneanenneniinacmaimiiiddaiiadiiaien 
TEST CASE NAME: SFDMX10 
SYSTEM SERVICE: DELMBX 
ARGUMENT UNDER TEST: CHAN_DMX10 


INPUT CONDITIONS: 
DELETE A MAILBOX CREATED BY EXEC MODE. 


EXPECTED RESULTS: 
) SYSTEM STATUS CODE: NOPRIV 
2) REGISTERS R2 THROUGH FP UNCHANGED 


(LARRARAARAAAAALALAALAALALLALELE SEES ESSER RES EEE E EERE EES SS 


eae eneeeeeeaennnnn 


MODE TO 100 EXEC NOREGS ; GET EXEC MODE FOR SCREMBX 


SCREMBX_S PRMFLG=41, : CREATE A PERM MBOX AT EXEC MODE 
CHA NECHAN, *DMX10 
MODE FROM, 10$ : BACK TO USER MODE 


hed eh edi edie edi al dh edich “che adic ede ih dh “dl “clch “adh “ech “dich “chub “dh A od 


OUI WI Wt 
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ooooooo 


SNAP AAA AA AAA MANNII 
M—OVOONOU EWA)" OWOOVNOUE UW" O0OO~ 
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NEXT_TEST_CASE SFDMX11 
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1073 ; 
: 73 gr podecnseentoserencesnenndnnenspeonedoosonedenneneesnse 
3 z 
E » TEST CASE NAME: SFDMX11 
E hi ; * SYSTEM SERVICE: DELMBX 
E 1: * ARGUMENT UNDER TEST: CHAN_DMX11 
se 1 ‘ : * INPUT CONDITIONS: 
f 1 ¢ 3 DELETE A PERMANENT MAILBOX WITHOUT THE PRMMBX PRIVILEGE. 
OS5—E 1 6 : * EXPECTED RESULTS: 
OSSE 1 3 * 1) SYSTEM STATUS CODE: NOPRIV 
038 8 }. 2) REGISTERS R2 THROUGH FP UNCHANGED 
SSE 1090 : RERAERERAEAEAEAAE AEE REAEAEEAREAEEEEEEEE 
0O55E 1981 so 
OSSE 1 38 3 
O33 199 MODE 0,20$,EXEC,NOREGS ; EXEC MODE FOR S$DELMB 
57B 1094 SDELMBX_S {Onenns =CHAN_DMX10 3 MARK afr DELETION MBOX ACQUIRED IN SFDMX10 
0589 1095 SDASSGN- 3 CHAN=CHAN_DMX10 3... AND GET IT DELETED 
0597 1096 MODE “FROM, 3 back’ 10 USER MODE 
0598 1097 SCREMBX_S PRAFLG=# #1, ; CREATE A USER MODE MAILBOX 
0598 1098 HAN=CHAN_ *DMX11 
O3AD 1999 PRIV REM, PRMMBX ; REMOVE PRMMBX PRIVILEGE 
05¢D 1101 ° NEXT_TEST_CASE SFDMX12 
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SY Savouneneennbbnewenseussenensenasnennnsesosensenseees 
TEST CASE NAME: SFDMX12 
SYSTEM SERVICE: DELMBX 
ARGUMENT UNDER TEST: CHAN_DMX12 


INPUT CONDITIONS: 
INVALID CHANNEL NUMBER (ZERO). 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVCHAN 
2) REGISTERS R2 THROUGH FP UNCHANGED 


PARRRARARASAASLALALALALELALELEA LEE ESE REE ESSE EERE TERE SS 


@eneeneneneneeneaeannnan 


PRIV ADD , PRMMBX ; GET ~~ PRI 
SDELMBX_S CHAN=CHAN_ DMX11 ; MARK FOR DEL 


NEXT_TEST_CASE SFDMX13 


GE REMOVED BY SFDMX11 


VILE 
ETION MBOX ACQUIRED IN SFDMX11 


I 
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TEST CASE NAME: SFDMX13 
SYSTEM SERVICE: DELMBX 
ARGUMENT UNDER TEST: CHAN_DMX13 


INPUT CONDITIONS: 
INVALID CHANNEL NUMBER (1 BILLION). 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVCHAN 
2) REGISTERS R2 THROUGH FP UNCHANGED 


LARRRRAAAAASALASSAALEAA SEALERS SAS ESAS RSE RASA SRR ESSE SE SE SD 
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PAERAEAAAAAAAAAAA AA AAA AO 
ati aad matali aiadad ad aiadadaDaabaiahabaiand 
NOUS WO OONOAUE WO OONO 
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NEXT_TEST_CASE SFDMX14 
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v04-000 SFOMKI4 B7SEb= Sac 60:38:59 UETPSY.SRCISATSSFO9.MAR; 1 “ (2) 
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TEST CASE NAME: SFDMX14 
SYSTEM SERVICE: DELMBX 
ARGUMENT UNDER TEST: CHAN_DMX14 


INPUT CONDITIONS: 
ISSUE SDELMBX FOR A DEVICE WHICH IS NOT A MAILBOX. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: DEVNOTMBX 
2) REGISTERS R2 THROUGH FP UNCHANGED 


LARRRRRAAAALALALAAAAA EAA ASASESE CEES SEER SESE SERRE ESS SS 


a@aeeneeneneneeaeanannnne 


Be Ge Ge Ge Se Se Ge Se Ge Se Ge Se Se Ge Se Se Ge Ge Se Ge 


SASSIGN_S DEVNAM=MY_DISK, CHAN=CHAN_DMX14 
; ASSIGN A DEVICE WHICH IS NOT A MAILBOX 


COOCOCOGOOCOOOCOOOCOOOOOOOOCOOoO 
PRARAEAPAARAAA AA AAA AAA AAA AASO 
WWII St SS Ss SS Ss SS Ss Ss SS SS YY SY 
— a > > as ss ss bs — 4s — >» 2 2s 2b — ss 2 se 
— — — — — 9 — 4 — 2» 9 2 —» 2s 2s 9 _»» — 2 2» 9 _ 2d 4 2 2 2 
SNA A AA AA AAA AMI 


ARO OWODNA UE WN OVO ONAUS Wn OOo 


Bs Be Be Be Be Be Be ee es es es Bs ss es Ds es es es De 


TCEND 
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SATSSFO9 = SATS SYSTEM SERVICE TESTS (FAILING S$. 16-SEP-19 AX/VMS Macro V04- P 9 
y042000 ~PEEr 188s B2:38:98 POETNSS Secce VOteeS aun. (Page 49, 
1128 TS1: 
1123 TESTSERV GETDEV, ERR, SATS, - 
1175 <1, DEVNAM_GDV - 
1178 BEVNAM_GDV10,IVDEVNAM, = ; SFGDV10 
‘ 117 DEVNAM-GDV11.IVLOGNAM, = : SFGDV11 
1128 DEVNAM-GDV12.1VLOGNAM, = ; sr GDv1g 
635 (117 DEVNAM~GDV1 * NOSUCHDEY, - +: SFGDVI 
6 1 0 DEVNAM-GDV14,ACCVIO, ° = . SFGDV14 
63511 : ‘ 
6 11 i <1,PRILEN_GDV - 
1 , PRILEN_GDV20,ACCVIO, = 3 SF GDV20 
11 : e 
635 11 ; <1,PRIBUF_GDV, - 
635 1188 PRIBUF_GDV30,BUFFEROVF, - ; SFGDV30 
635 1189 PRIBUF-GDV31.ACCVIO, © = : SFGDV31 
se 8 : : 
0635 1198 <1,SECLEN_GDV, - 
635. 119 SECLEN.GDV40,ACCViO, = ; SFGDV40 
bess 1198 ; 
06 5 1196 <1, SECBUF_GDV, + 
635 119 SECBUF_GDVSO,BUFFEROVF, - ; SFGDVS5O 
0635 1198 SECBUF~GDV51.ACCVIO, © = : SFGDV51 
Bs : : 
098D 1503 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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-SEP=1 UETPSY. SRCISATSSF 
AD 1 ; 
gap ; TESTSERV GETCHN,ERR,SATS, - 
9AD 1005 <1, CHAN_GCH, ° 
9AD 1 6 CHAN_GCH10, IVCHAN, - ; SFGCHIO 
9AD 1 CHAN-GCH11,1VCHAN, - +: SFGCH11 
4 ! 8 CHAN_GCH12,NOPRIV, - *, SFGCH12 
9AD 151 , . 
9AD 1 19 <1,PRILEN_GCH ° 
gAD 19 PRILEN_GCH20,ACCVIO, = i SFGCH20 
9AD 1514 : pa 
9AD 1215 <1,PRIBUF_GCH - 
9AD 1 1 PRIBUF ~SCH30 BUFF EROVF, - ; SF GCH3O 
AD i PRIBUF-GCH31,ACCV10, —° = 3 SFGCH31 
9AD 1021 ; . 
9AD 1220 <1, SECLEN_GCH - 
O9AD : SECLEN.GCH40,ACCVIO, <= 3 SFGCH40 
9AD 1 ; . 
ne 1226 <1, SECBUF _GCH - 
9AD 1225 SECBUF_GCHSO,BUFFEROVF, - ; SFGCHS5O 
O9AD : SECBUF-GCH51,ACCVIO, © = i SFGCHS1 
9AD 1228 , 
CFA 1229 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 


says F = SATS SYSTEM SERVICE TESTS (FAILING S. 19r36F =1384 90: 3B: 98 Ye vey ene £e Oe Oe MAR: 1 


TS3: 
TESTSERV ASSIGN,ERR,SATS, 


<1, DEVNAM_ASN - 
SEVNAM_ASNIO,IVLOGNAM, = ; SEASNIO 
DEVNAM-ASN11,NOSUCHDEV, = ; SFASN1 

DEVNAM: ASN12,ACCVIO, | = 3; SFASNI2 


v 
. 
a 


<1,CHAN_ASN, - 
CHAN_ASN20,ACCVIO, - ; SFASN20 


<1, ACMODE_ASN, 


<1,MBXNAM_ on. 
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“OVCTVTVTVTVTVTVTVVVTVCVCVCVV9VT°CC0C0C00"8 
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TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 


- SATS SYSTEM SERVICE TESTS (FAILING S. at tae b+ $0: 38: 98 Y 


-SEP=19 
FEO 1254 TS4: 
Fe 5 TESTSERV DASSGN,ERR, SATS, 
FEO 1 5 <1, CHAN_DAS, 
FEO 1258 CHAN_DAS10,NOPRIV, 
FEO 1 CHAN-DAS11.1VCHAN, 
re 1 6 CHAN-DAS12.1VCHAN, 
FEO | 
1084 136 TS_CLEANUP ; CLEAN UP & RET 


AX/VMS Macro V04- 
UETPSY.SRCJ SATSSF MAR; 1 


URN TO TEST_SERV_EXEC 


- SATS SYSTEM SERVICE TESTS (FAILING S. i $ o- 138% 89: 3: 98 Yeeeyee $¢,y v0 88 MAR: 1 Page " 


1904 1264 TSS: 

1904 1 TESTSERV DELMBX,ERR, SATS, : 
10a 156? <1, CHAN_DMX, . 

1904 1268 CHAN DMX1O,NOBRIV, - 5 SFDMX10 

1004 1 CHAND ; - + SFDMX11 

1904 1270 CHAN” NDIA TVCHAN, =; Sepmg 

1004 157 CHAN"DMX1 8.1 VCHAN - 5 SFOMXI 

1904 1278 CHAN“DMX14,DEVNOTMBX, = : SFDMX14 

lope 159% de - 
11B8 1575 TS_ CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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.SBTTL EXECUTE & CLEANUP 
TEST_SERV_EXEC 
BSBW © MOD_MSG_P 


iS EXECUTE: 
hi CLEANUP: 


SEXIT_S MOD_MSG_CODE 


1 9 
cape TESTS (FAILING S. 19° HH =138¢ 89: 3: 98 rede: 0 V04- 


UETPSY SSATSSF «MAR; 1 


; EXECUTE ALL T. CASES IN ALL GROUPS 
PRINT TEST MODULE END MSG 


1 INSV asi ssy. INHIB. MSG,A1 mo MSG_C 


CODE 
; INHIBIT PRINTING 
: EXIT TO OP SYS WITH MSG CODE 


5 
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ATSSF 
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TC_CONTROL 


—-Or—Vuw Kw Cw ZY 
w we w —w We by 


EXEC MACRO) 
CLEANUP MACRO) 


RE TS 


48 fSVwwe wen J9D-wH 


ITHIN THE TEST SERV 


SSUED WITHIN T 


—O Dawe ZZvvww-u za 


.SBTTL TC_CONTROL 


FUNCTIONAL DESCRIPTION: 
E 
E 
N 
U 
A 
I 
P 
I 
T 
E 
E 
E 
E 
E 
0 
BSBW TC_CONTROL 


P 

N 

0 

D 

$ 

E 

E 
CALLING SEQUENCE: 
INPUT PARAMETERS: 


— NN OV Me Tu 


+ 


NOP. DEOMK— CIM TFTNOP. DOO CUM TNOR. OKO CUMS 
DDODDDAOOOPCOOCAOADPOOOOCOCOCOCCCSC 8 ee — 
DIOS IOI OOO IOI OOP PP PPP PPP PTD 


i ee 


Sei cell cee cei atk suai eee cell cell cee cel ee eel oll eel ceed eel cel cel eel cel el el eel cel eel ee el 


sagen sence vesrs crak 5. oceee tees BESENE ECO STEED ass OO Hf 


NONE 
IMPLICIT INPUTS: 


ARGUMENTS SPECIF 68 ON EACH TESTSERV wim MAY BE VIEW 
INPUTS, SINCE TC_CONTROL AND TESTSERV ACT AS CO=ROUTIN 


OUTPUT PARAMETERS: 
tte? COD 
IF TEST 
set 10 SUCCE 

IMPLICIT OUTPUTS: 


RUETP=I-TEXT, ERROR MESSAGES ARE WRITTEN TO SYSSOUTPUT BY 
THE TESTSERV MACRO (CO-ROUTINE WITH TC_CONTROL) 


SATSSF = SAT 
v04- Tc_¢ 


E FIELD OF MOD_MSG_CODE (BITS 
¢ 7 * THE CURRENT GROUP FAILS: 


A 
$ 


COMPLETION CODES: 
NONE 

SIDE EFFECTS: 
NONE 


TC_CONTROL: 
PUSHL 


tb = bs ab bb ss 2 a a a a a a 
PRADA AMAA AAAI ES BE BS ES EEE BANNAN AAA A UIOPOPPONPNININD 4 


MEAN OOD NAUE WIN 9 OD NAN E WN O OD NA UE WWI CO ODA WH OOONO 


00000064"EF ODD TS_EP ; PUSH Ves Tseey ENTRY POINT 
9E 16 9 a(SP)+ : TER TESTSERV_ INITIALIZATION 
8 10$: : PROCESS NEXT TEST CASE 
00000056 'EF 0 90 MOVB #*A/ /,SSTSTNSS+2 ; MAKE SURE T.C. NAME HAS A BLANK 
30 BSBW REG_SAV : SAVE REGISTERS 
Q0000004'FF 16 SB @CURRENT_TC : P TO CURRENT TEST CASE 
0037 30 BSBW EG_RES : RESTORE REGS FOR TESTSER 
25 16 $B a(SP)+ : LET TESTSERV ISSUE SYSTEM SERVICE 
004 30 4 BSBW REG_C ; COMPARE REGS TO SEE IF ... 
4 i oees SYSTEM SERVICE CHANGED ANY 
9E 16 & JSB a(SP)+ ; LET TESTSERV CHEK S.S. STATUS CODE 
QOO000S6'"EF 2A 91 4 CMPB #*A/*/ ,SSTSTNS$+2 ; HAS TESTSERV INDICATED FAILURE ? 
DD 12 4C BNEQU 108 ; NO ~~ PROCESS NEXT TEST CASE 
00000060 ' EF gooogges' et OF rt} MOVAL TEST _MOD FAIL,TMD_ADDR YES == INDICATE FAILED IN END MSG 
00000044°EF 0 00 $ F 5 INSV + | al 40,43, MOD_ ASG_ cone ; ADJUST STATUS CODE FOR ERROR 
C 11 $e BRB ; LOOP BAK TO PROCESS NEXT TEST CASE 
ot ; TC CONTROL RETURNS TO TEST_SERV_EXEC VIA TESTSERV (IN TS_CLEANUP MACRO) 


SATSSF = SATS SYSTEM SERVICE TESTS CrAILING S. _ ae 9 90:38:08 AX/VMS Macr 


Pose $ 
vO4= SUBROUTINES EP=1984 nt 


UETPSY.SRCJ SATS 19709. MAR; 1 ( 


1264 1367 ~SBTTL SUBROUTINES 
! ? i ; REG_ SAVE: 
! 9 1 4 RPP SEES ESOS CICLO SEL IOIE CET TTecirriiir icici ir iriiiiiitiiify 
4 ee rT 
} et } ogi : : SAVES RO THRU SP IN REG_SAVE_AREA : 
} ? ! Pe ; PARSE SELLS LIE ICES SST TICE STC eT Cece Teri i cirri iti ri ii iiiiiiit) 
7FFF 8F #8 1264 1 i: : PUSHR #R U_SP ; SAVE ALL REGS ON STACK, 
00000008 ' EF ge C 1 8 137 MOVCS #6 7158); “ope SAVE_AREA : SAVE Bey ster one $.S.) 
FFF 8F BA 1 1 4 POPR #RO_T : CLEAN UP STA 
5 127 137 6 ecece AND STURN 
1275 1380 ; 
1275 1381; 
1275 «1 ¢ 3 
1275 «(1 . 
1275 1384 REG_REST: 
1398 1386 : 
1 es 1 es : REAR A REA AEEREREAAAAARAAAAAAAARAAARARAARARAAARRRAAARERETEEE 
1 1388 ; * * 
! fe ! 8 s RESTORES RO THRU SP FROM REG_SAVE_AREA : 
1 ae 1391 : PoP PSS SSIS SCSI TTT iit i iti i iii iit iiiiiitititiiitt 
1275 1392 ; 
5E 3C 1275 «1 38 SUBL #60,S ; MOVE SP TO MAKE ROOM 4 hy 
6—E 00000008'EF 3¢ 2 1278 1394 noe #60, REG ae -AREA,(SP) ; MOVE REGS ONTO STACK FOR POP 
7FFF 8F BA 1280 1395 OPR #RO_THRO_S 3; RESTORE ALL aes FOR TESTSERV 
05 1284 1396 RSB 3 «+. AND RETUR 


nN 


04-000" SUBROUT 
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SY 
IN 
1398 REG_COMP 
1 14 0 : PRRRASAALALALALALALALAELLAL ALES SALE EEE EEE EECCA S EEE EEE EEE EEE aaa Sy 
1 1401; * + 
1 14 ; : * 1) PUSHES ALL REGS ONTO STACK * 
1 1403 : ®* 2) COMPARES REGISTER IMAGES FROM STACK WITH CORRESPONDING * 
14 4 ; of Hy AGES ERO FRO m REGS SAVE_AREA FOR ALL REGISTERS SPECIFIED * 
. © 
1 14 6 : * 3) FOR EACH” NEGOAL COMPARE AN ERROR MESSAGE IS PRINTED . 
1 1407: * (USING $FAO AND SOUTP Put SYSTEM SERVICES). * 
g 14 8 ; * 4) POPS ALL REGS OFF OF $ ‘ 
1 2 1410 : PPP PSEC ESTOS LETTS TPP TT TTT TET erie rrr i iit i ii iii tiiiiiititiiiec 
1285 1411; 
7FFF 8F BB 1285 1618 PUSHR #RO_T : SAVE ALL REGISTERS ON STACK 
56 O0000008'EF DE 59 1413 MOVAL REG~ SANE ~RREA, R6 POINT RE 10 BEG OF 85 
54 SE 0 $9 1415 MOVL SP, R4 : POINT R4 10 BEG 6 OF a4 ; 
53 FF BF 98 33 1447 a comp Wee #-1,R3 : iwittacize REG_COMP “MASK INDEX 
53 06 1297 1419  ~ INCL ; POINT T9 NEXT Bt IN MASK 
53 OF «691':—«1299 «1420 CMPB ss #15, R3 : END OF THE 
03 1A 129C 1421 BGTRU REG. COMP_CONT ‘ NO == CONTIN UES 
009F 31 129F 14 g BRW REG-COMP-RSB : YES == GO TO COMMON RETURN 
12A1 1423 REG_COMP_CONT: 
84 86 D1 12A1 1424 TMPL = (R6) + (Rae : REG BEFORE = REG AFTER ? 
F1 13 1204 1425 BEQLU REG COMP_N == LOOK FOR NEXT REG 
E9 00000000'EF 53 €7 Ag 14 $ BBC REG_ COME. XMASK, REG comb NEXT a ett art © vei aut a 
' AE 14 MOVL CLOB_REG : NO -- GIVE REG NUMBER TO FAO 
Sasser FEA OB ieee ite it SIRE aonegs 2 FE ria conan te ue 
00000056'EF 2A 90 C5 13 MOVE #*A/*/_$$TSTNSS$+2 : GIVE FAILURE INDIC'N IN ERROR MSG 
12CC 1433 ° SFAO_S ERR_MSG_FAOCTL,OUTL,OUTD, $S$SNADSS, 
eC 1434 ~”  $SASEQSS,$$PSEQ$$,CLOB_REG_NO,REG BEFORE_SS,REG_AFTER_SS 
F 1436 ° MOVW ; ACTUAL OUTPUT LEN IN STRING DESC'R 
ee ee i 66 1239 PUTMSG vUEteS. PEXT, #1,#0UTD> ; PRINT THE MS 
EDF2 CF 0084 8F BO 1318 1438 MOV #ouTE- -00TB, OUT $ GET MAX LEN BACK INTO. DESCRIPTOR 
00000056°EF 20 90 1 8 1439 MOVB #*A/ /, SSTSTNS$#2 : REMOVE FAIL INDIC'N NEXT MSG 
smth GROOT EE FG HE TPT PAN Ae ama MADE GATE IP tan 
wads has 31 133 1448 BRW REG_COMP_ ; io” Pao FOR NEXT REG TO COMPARE 
7FFF 8F BA 1 10 1eez REG_ COMP se: #RO_THRU_SP ; CLEAN UP STACK 
05 134 1445 RSB eee, > RETURN TO CALLER 


pe 
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1467 MOD_MSG_PRINT: 
1449 : RETA KAAAEAAEHAAAEAAAARAAAAAAAAARAAAARAAAEAAAEAAARAEAARERAEAAAREREEAAEAEEEE 

g ® ® 
14 ? 3 * PRINTS THE TEST MODULE BEGUN SUCCESSFUL/FATLED MESSAGES * 
1 ¢ 3 @ (USING THE PUTMSG MACRO) * 

. & 
1328 : LARARAAAALALALALALEALALELA SELES EEE SERS EEE E EEE E EE EEE EES EEE EC AES 
1428 : PUTMSG <MOD_MSG_CODE,#2,TMN ADDR, TMD_ADDR> ; PRINT MSG 
143 RSB y eee AND R RETURN TO CALLER 
1288 tHMRTN: 
1299 F RARER E RARER AE RARER AERA AREA AAEAAREAAEAERAAARAAERAARAEE REE 

g ® 
1496 3 * CHANGE MODE ROUTINE . THIS ROUTINE GETS CONTROL WHENEVER 
14635 ; * A CMKRNL, CMEXEC, OR CMSUP SYSTEM SERVICE IS ISSUED 
1464 : * Y THE MODE MACRO ae OPTION) - IT MEREL 
1465 ; * A JUMP INDIRECT ON A FIELD SET UP BY MODE. IT HAS 
1468 3 @ THE EFFECT OF RETURNING TO THE END OF THE MODE 
1288 3 : MACRO EXPANSION. 
1398 : PAARAAAALASLALALALALALALALALLESELESELEAAEEAESASELALELESESE LES ESS 
1471 .WORD 0 : ENTRY MASK 
1306 JMP @CHM_CONT ; RETURN TO MODE MACRO IN NEW MODE 
eS : RET INSTR WILL BE ISSUED IN EXPANSION OF "MODE FROM, ...." MACRO 
1476 ° .END  SATSSFO9 


SATSSFO9 
Symbol table 


SSSCHARS 
SSSFIRSTTCSSS 
SS$SSTRINGS 


SSSNADSS 
$$T1 
$$12 
SSTSTNSS 
ACMODE_ASN 
CHAN_ASN 
CHAN~ASN20 
CHAN~DAS 
CHAN~DAS10 
CHAN-DAS11 


CHAN_DAS12 


CHM_CONT 
CLE 


P 
CURRENT TC 


RROR 
ERR_MSG_FAOCTL 
EXECUTE 


GRP_TOTAL 
INABR 
INFO 


SNS "DUOC OMMOmMm ns PmomnnNoOoOs 
zw DDBDAwDAAzDwD 
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oo OGOOOCOOCOOCO 


SHR AOOOOroonr 
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oo 
on 


So 
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LIBSSIGNAL 
MBXN SN 


SG_CODE 
SG~PRINT 
ISK 


PRIV_ARGS 
PROT 
PRTSC_NA 
PRVSV_PRMMBX 
PRVPR 
PSLS$C_USER 
Rd THRU_SP 


S.. 
REG_BEFORE_SS 
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AX/VMS Macro 
UETPSY.SRCIJSA 
ReRRRARE x 06 
0 
f R 
g 
R 
R 
000044 R 3 
001345 R $ 
0 $568 R 
0 iS 
{1 a 

0000085 R 02 

000011C R 06 

0000114 R 06 

QOOO1A0 R 06 

44454 R 06 

00 44! 

0000093 R 03 
44s R 03 
88 dha R 8 

0000093 R 0 
QOOOOOFF R 03 
Q00001F8 R 0 
00000091 R 0 
000001F6 R 8g 
00000091 R 0 

Q0001F6 R 8g 

0000071 R 0 

0000002 

0000081 R 02 
Reekeere x 02 
0000000 
494 44 Rg 03 

000000 
00007F FF 

000007D R 03 

0000050 R 03 

000004C R 03 
Bos 1285 R 06 

00012A1 R 06 

0000000 R 02 

8 1297 R 6 

1 39 R 6 

83 1275 R 6 

0 Bar 64 R 0 
08 R 0 

8 68 R 

R 

aE 

1 R 

if 

708 

1F8 R 

091 R 


$709 .MAR: 1 
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Symbol table SEP-1984 SRCISATSSFO9.MAR; 1 (3) 
SECLEN_GCH40 1F6 
SECLEN_GDV 991 
SECLEN_GDV40 F6 
SEVERE 4 
SHRSK_SHRDEF 9 1 
SHR$_ TEXT 1130 
SS$_ACCVIO eeeeeeee xX 6 
SS$_BUF FEROVF eeeeeeee x 6 
SS$_DEVNOTMBX eeeeeeee =X 6 
SS$_IVCHAN eeereeee 6 
SS$_IVDEVNAM eeeeeree x 6 
SS$_IVLOGNAM eeeeeeee YX 6 
SS$_NOPRIV eeeeeree =X 6 
SS$_NOSUCHDEV eeeereee § X 06 
STSSV_INHIB_MSG = 0000001¢ 
SUCCESS = 00000001 
SYSSASSIGN eeeeeeee GX 06 
SYSSCMEXEC eeeeeeee GX 06 
SYSSCMKRNL eeeeeeee GX 06 
SYSSCREMBX eererere GX 06 
SYSSDASSGN eeeeeeee GX 06 
SYSSDELMBX eeeeeenre GX 06 
SYSSEXIT eeeeeeee GX 06 
SYSSFAO eeeeeere =X 06 
SYSS$F AOL eeeeeeee GX 6 
SYSSGETCHN eeweeeee GX 06 
SYSSGETDEV teeeeeee GX 06 
SYSSHIBER eeeeeere GX 06 
SYSSSETPRN eeeenere GX 06 
SYSSSETPRT teeeeeee GX 06 
SYSSSETPRV eeeeeeee GX 06 
SYSSWAKE eeeeeeee GX 06 
TC 80008 41 R 06 
TC 00002E1 R 06 
TC 0000SDD R 06 
TC4 B05 0459 R 06 
TCS O0004F & 06 
TCG_NO = 000000 
TC_CONTROL 90001 R 06 
TEST_MOD_BEG 00000 R 
TEST_MOD_FAIL 9000 88 R 0 
TEST_MOD_NAME DO006E R 
TEST_MOD_NAME_D DOBF R 
TEST _MOD_SUCC 4 R 
TMD_ADDR $ R 
TMN_ADDR R 
TPIB R 
TS] R 6 
IS¢ AD R 6 
TS 1A R 6 
TS4 44 R 6 
Pe Hig 
TTRAME Se R 
UETP$_SATSMS = 
UETPS$_ TEXT = 
WAR = 000000 
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teomwnr see eae eae Sa 


; Psect synopsis ! 


eeeseeazas woe eewe ¢ 


PSECT name Allocation PSECT No. Attributes 

‘ ABS £8008 8 ( -)» 00 ¢ 9. NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS 0000 ( >» O1 ¢ -) NOPIC USR CON ABS LCL NOSHR’ EXE WRT NOVEC BYTE 
RODATA 88 ( 655.) § ( §°} NOPIC USR CON REL LCL NOSHR NOEXE RD NOWRT NOVEC LONG 
RWDATA ( 06.) ( -) NOPIC USR CON REL LCL NOSHR NOEXE R WRT NOVEC BYTE 
SATS_ACCVIO_1 Be ( 512.) 04 ¢ 4.) NOPIC USR CON REL LCL NOSHR NOEXE' AD WRT NOVEC PAGE 
SATS-ACCVIO_2 ( 512.) 05 ¢ 5.) NOPIC USR CON REL LCL NOSHR NOEXE RD WRT NOVEC PAGE 
SATSSFO9 00001569 ( 4969.) 06 ¢( 6.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC LONG 


¢oeeoeeeeeceosecan Sec eooe ema a + 


! Performance indicators ! 


cance wm eee e BE eeonear eee aw + 


Phase Page faults CPU Time Elapsed Time 
Initialization 9 00:00:00.08 00:00:00.43 
pounene processing 107 0:00:00.60 Eb She Bey 
474 0:00:21.25 00: B03 °8 
Synbol table sort 11 00:00:01.38 88:88 308- 3 
s2 407 00:00:05.61 00:00:1 €y 
ee table output 23 98:98: 0.16 00:00:00.31 
Psect synopsis output 6 0:00:00.04 00:00:00.04 
Cross-reference output 0 00:00:00.00 00:00:00.00 
Assembler run totals 1059 00:00:29.12 00:01:01.19 


The_working set Limit was 900 pages. 
116701 bytes (228 pages) of virtual memory were used to buffer the intermediate cod 
There were 50 pages of symbol table space a iesotes to hold 689 non-local and 209 focal symbols. 
1476 source Lines were read in Pass 1, produci ng 4 object records in Pass 2. 
69 pages of virtual memory were used to define 53 macros. 


guweceuseoecooecesoeccescess} 


Macro Library name Macros defined 

-§ SS55¢DUAzE: Hace ety MB; 8} 9 
Syst IBISTARLET MLB;2 26 

Teta (all Libraries) 47 


1319 GETS were required to define 47 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:SATSSF09/0BJ=OBJ$:SATSSFO9 MSRC$:SATSSFO9/UPDATE=(ENHS: SATSSFO9) +EXECML$/LIB+SHRLIBS$:UETP/LIB 
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